Event OnNewPlayerJoin( $userName )
$userName = GetCurrentPlayerVar( "UserName" );
UserGroupFromFile( "IPAddress", "./Blacklist.txt" );
IF ( UserInGroup( "IPAddress",$userName ) == 1 )
THEN
cmdLFS("/kick " . GetCurrentPlayerVar("userName") );
ENDIF
EndEvent
Event OnNewPlayerJoin( $userName )
$IPAddress = GetCurrentPlayerVar( "IPAdress" );
UserGroupFromFile( "IPAddress", "./Blacklist.txt" );
IF ( UserInGroup( "IPAdress",$IPAddress ) == 1 )
THEN
cmdLFS("/kick " . GetCurrentPlayerVar("userName") );
ENDIF
EndEvent
Event OnNewPlayerJoin( $userName )
UserInGroup( "IPAdress", "./Blacklist.txt" );
IF (UserInGroup( GetCurrentPlayerVar("IPAdress") == 1)
THEN
cmdLFS("/kick " . GetCurrentPlayerVar("userName") );
ENDIF
EndEvent
RegisterNodeAction( TESTID, getLapperVar( "ShortTrackName" ) , getCurrentPlayerVar("CurrNode") , test,"" );
Sub test($UserName,$ZoneID)
privmsg("ID=".$ZoneID); #output is TESTID
EndSub
CatchEvent OnNewPlayerJoin( $userName ) # Player event
OnNewPlayerJoin_IP_Saving();
EndCatchEvent
Sub OnNewPlayerJoin_IP_Saving()
$userName = GetCurrentPlayerVar( "UserName" );
PrivMsg ("^7DEBUG 1: " . GetPlayerVar($userName,"IPAdress") );
PrivMsg ("^7DEBUG 2: " . GetCurrentPlayerVar( "IPAdress" ) );
SetStoredValue( $userName . "IPAdress", GetPlayerVar( $userName,"IPAdress" ) );
#SetStoredValue( $userName . "IPAdress", GetCurrentPlayerVar( "IPAdress" ) );
EndSub
Event OnConnect( $userName )
SetStoredValue( $userName . "IPAdress", GetPlayerVar($userName,"IPAdress") );
EndEvent
$register_counter = ToNum( GetStoredValue( "REGISTER_COUNTER" ) );
IF ($register_counter == "")
THEN
$register_counter=0;
ENDIF
FOR ($i=0;$i<$register_counter;$i=$i+1)
IF (GetStoredValue( "logon_username_" . $i ) == $userName )
THEN
SetCurrentPlayerVar( "logon_code",GetStoredValue( "logon_code_" . $i ) );
SetCurrentPlayerVar( "logon_password",GetStoredValue( "logon_password_" . $i ) );
ENDIF
ENDFOR